home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1993 / MacHack 1993.toast / MacHack™ 1987-1992 / MacHack™ '90 / Other Stuff / Demos ƒ / Demo AppMaker / Demo AppMaker™ / Demo AppMaker™.rsrc / TmPT_1004_RadioButton < prev    next >
Encoding:
Text File  |  1990-03-23  |  458 b   |  28 lines
  1. %case uses%
  2. %case instance%
  3. %case create%
  4.     aGroup.AddButtonID (%cntlID%, enclosure);
  5.     %if firstInGroup%
  6.         aGroup.SetStationID (%cntlID%);
  7.     %endif%
  8. %case itemNr%
  9.     %DefineItem%
  10. %case dialog field%
  11.     %Enable?%
  12. %case init field%
  13.     %Enable?%
  14. %case auxiliary%
  15. %case filter%
  16. %case set%
  17. %case enable%
  18.     %Enable?%
  19. %case hit%
  20.     %if not lastInGroup%
  21.         %itemname%,
  22.     %else%
  23.         %itemname%: begin
  24.                 DoRadio (%firstradio%, itemNr, %fieldname%);
  25.             end;
  26.     %end if%
  27. %case finish%
  28.